home *** CD-ROM | disk | FTP | other *** search
/ Merciful 5 / Merciful - Disc 5.iso / software / h / hypertextdatav40.12cr.lha / HTDS / ARexx / getobjectinfo.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1996-10-31  |  647 b   |  36 lines

  1. /*
  2. ** $PROJECT: HyperText-DataType-System
  3. **
  4. ** $VER: getobjectinfo.rexx 40.1 (29.08.96)
  5. **
  6. ** by
  7. **
  8. ** Stefan Ruppert , Windthorststrasse 5 , 65439 Floersheim , GERMANY
  9. **
  10. ** (C) Copyright 1996
  11. ** All Rights Reserved !
  12. **
  13. ** $HISTORY:
  14. **
  15. ** 29.08.96 : 040.001 : initial
  16. **
  17. */
  18.  
  19. options results
  20.  
  21. ADDRESS 'MULTIVIEW.1.1'
  22.  
  23. title    = 'none'
  24. file     = 'none'
  25. nodename = 'none'
  26.  
  27. 'GETATTR OBJECT=OBJECT FIELD=TITLE    VAR=TITLE'
  28. 'GETATTR OBJECT=OBJECT FIELD=PATH     VAR=PATH'
  29. 'GETATTR OBJECT=OBJECT FIELD=NODENAME VAR=NODENAME'
  30.  
  31. Say 'Object Title : "' || title || '"'
  32. Say 'Object File  : "' || path  || '"'
  33. Say 'Object Node  : "' || nodename || '"'
  34.  
  35.  
  36.